(Info-extract-menu-node-name): Fix 2003-01-24 change.

Don't search for next colon if current colon is followed by
one of ".", ",", ";", or ")".

diff --git a/lisp/info.el b/lisp/info.el
index f25c5b2d0b584cee318696dbda1e68ff750fcbf8..42c9889d8e3a2724b8e6615029bb3d225f715698 100644 (file)
--- a/lisp/info.el
+++ b/lisp/info.el
@@ -1484,7 +1484,7 @@ FOOTNOTENAME may be an abbreviation of the reference name."
   (skip-chars-forward " \t\n")
   (let ((beg (point))
        str i)
-    (while (not (looking-at ":*[ \n]"))
+    (while (not (looking-at ":*[,.;) \n]"))
       (skip-chars-forward "^:")
       (forward-char 1))
     (setq str